home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Loadstar 135
/
135.d81
/
ts viewer
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2022-08-26
|
1KB
|
29 lines
4 dv=peek(186):ifdv<8thendv=8
10 poke53281,0:poke53280,0:print"[147][129] [212][200][197] [205][201][199][200][212][217] [204][207][193][196][211][212][193][210]"
12 print" [212][201][212][204][197] [211][195][210][197][197][206] [214][201][197][215][197][210]"
13 sys57812"unpacker.89",dv,0:poke780,0:poke781,0:poke782,201:sys65493
14 sys57812"intro.shp",dv,0:poke780,0:poke781,0:poke782,30:sys65493
18 poke53280,0
20 print"[155] [215]hile the title picture is showing
22 [153]" press any key to return to (NULL)(NULL)atnstr$(NULL)(NULL)atn(NULL).
24 print" [208]ress a key now.
28 [151]198,0
30 [161]a$:[139]a$[178]""[167]30
31 [151]251,30:[151]252,64:[151]253,96
32 [158]51456:[158]51459
38 [151]198,0
40 [161]a$:[139]a$[178]""[167]40
42 [158]51459:[153]"load":[151]53281,0
50 [137]40000
10000 dv[178][194](186):n$[178]"ts viewer":[159]15,dv,15,"s0:"[170]n$:[160]15:[148]n$,dv:[128]
40000 [129]i[178]0[164]21:[151]828[170]i,8[170]i:[130]
40010 [139]dv[179]8[176]dv[177]29[176]dv[178]8[167]40030
40020 a[178][194](828):b[178][194](828[170]dv[171]8):[151]828,b:[151]828[170]dv[171]8,a
40030 a$[178]"hello connect":[129]j[178]8[164]29:i[178][194](828[170]j[171]8):[139]i[178]14[167][130]
40040 [160]2:[159]2,i,2:[160]2:[139]st[167]40060
40050 [160]15:[159]15,i,15,"r0:"[170]a$[170]"="[170]a$:[132]15,er:[160]15:[139]er[178]63[167]40070
40060 [130]:[153]"load":[151]53272,23:[151]186,8:[128]
40070 q$[178][199](34):[151]646,[194](53281):[153]"load":[151]53272,23
40080 [153]"loadp(NULL)2048,0:p(NULL)44,8:p(NULL)43,1:p(NULL)56,160:p(NULL)55,0:clr:l(NULL)"q$a$q$","i
40090 [153]"run:":[151]631,13:[151]632,13:[151]198,2:[128]